home *** CD-ROM | disk | FTP | other *** search
/ PC Play 129 / pc play 129.iso / Demo / man2 / man2.exe / data / scripts / bone_scripts.lua < prev    next >
Encoding:
Text File  |  2004-10-20  |  5.3 KB  |  127 lines
  1.  
  2. function units_genericbone_setup()
  3. end
  4.  
  5. function units_genericbone_resetup()
  6. end
  7.  
  8. function units_genericbone_select()
  9. end
  10.  
  11. function units_genericbone_unselect()
  12. end
  13.  
  14. function units_genericbone_selectenemy()
  15. end
  16.  
  17. function units_genericbone_damaged()
  18. end
  19.  
  20. function units_genericbone_highlight()
  21. end
  22.  
  23. function units_genericbone_move()
  24. end
  25.  
  26. function units_genericbone_fire()
  27. end
  28.  
  29. function units_genericbone_explode()
  30.     local bullet = uniGetExecutor()
  31.     bullet:setTransformOwner()
  32.     local burn_ps = nil
  33.     if rand(0,3) > 2 then
  34.         burn_ps = bullet:addSimpleEffect(ENET_EFFECT_PS_ENVIRONMENT_BONESMOKE)
  35.     end
  36.     waitDeath(bullet:addMoveEffect(ENET_EFFECT_MOVE_GRAVITYPARABOLA_CHAOTICROTATION,40,nil,4))
  37. --    local dir = D3DXVECTOR3:new(rand(-0.5,0.5),rand(0.5,1),rand(-0.5,0.5))
  38. --    waitDeath(bullet:parabolicFly(dir,rand(10,20),false))
  39. --    dir:delete();
  40.     if burn_ps then burn_ps:suspendedDestroy(2.0) end
  41.     local hitType = bullet:getLastMovementEndType();
  42.     if(hitType == ENBHT_WATERHIT) then
  43.         local ps_bh = bullet:addSimpleEffect(ENET_EFFECT_PS_BONE_WATERHIT)
  44.         ps_bh:suspendedDestroy(2.0)
  45.         ps_bh:setTransformOwner()
  46.     end
  47.     waitDeath(bullet:addMoveEffect(ENET_EFFECT_MOVE_SINK,20,nil,100))
  48. end
  49.  
  50. function units_targetbone_explode()
  51.     local bullet = uniGetExecutor()
  52.     bullet:setTransformOwner()
  53. --    waitDeath(bullet:addMoveEffect(ENET_EFFECT_MOVE_GRAVITYPARABOLA_CHAOTICROTATION,40,nil,4))
  54.     local hitType = getHeightType(bullet:getWorldPosition());
  55.     if(hitType == ENBHT_WATERHIT) then
  56.         pause(1.0)
  57.         local sink_waves = bullet:addSimpleEffect(ENET_EFFECT_EFFECTEMITTER_SHIPSINKING)
  58.         sink_waves:setTransformOwner()
  59.         local rot = bullet:addSimpleEffect(ENET_EFFECT_ROTATE_SINKING)
  60.         pause(2.0)
  61.         local sink = bullet:addMoveEffect(ENET_EFFECT_MOVE_SINK,5,nil,100)
  62.         local holder = enHolder:new(sink)
  63.         pause(2.0)
  64.         rot:destroy()
  65.         waitDeath(sink)
  66.     elseif(hitType == ENBHT_GROUNDHIT) then
  67.         pause(1.0)
  68.         waitDeath(bullet:addMoveEffect(ENET_EFFECT_MOVE_SINK,25,nil,100))
  69.     end
  70. end
  71.  
  72. function units_basebone_explode()
  73.     local bullet = uniGetExecutor()
  74.     bullet:setTransformOwner()
  75.     local burn_ps = nil
  76.     if rand(0,3) > 2 then
  77.         burn_ps = bullet:addSimpleEffect(ENET_EFFECT_PS_ENVIRONMENT_BONESMOKE)
  78.     end
  79.     local dir = D3DXVECTOR3:new(rand(-0.5,0.5),rand(0.5,1),rand(-0.5,0.5))
  80.     waitDeath(bullet:parabolicFly(dir,rand(10,20),false))
  81.     dir:delete();
  82.     if burn_ps then burn_ps:suspendedDestroy(2.0) end
  83.     local hitType = bullet:getLastMovementEndType();
  84.     if(hitType == ENBHT_WATERHIT) then
  85.         local ps_bh = bullet:addSimpleEffect(ENET_EFFECT_PS_BONE_WATERHIT)
  86.         ps_bh:suspendedDestroy(2.0)
  87.         ps_bh:setTransformOwner()
  88.     end
  89.     waitDeath(bullet:addMoveEffect(ENET_EFFECT_MOVE_SINK,20,nil,100))
  90. end
  91.  
  92. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_MOVE,"units_genericbone_move")
  93. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_FIRE1,"units_genericbone_fire")
  94. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_FIRE2,"units_genericbone_fire")
  95. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_SELECT,"units_genericbone_select")
  96. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_SELECTENEMY,"units_genericbone_selectenemy")
  97. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_UNSELECT,"units_genericbone_unselect")
  98. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_SETUP,"units_genericbone_setup")
  99. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_RESETUP,"units_genericbone_resetup")
  100. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_DAMAGED,"units_genericbone_damaged")
  101. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_EXPLODE,"units_genericbone_explode")
  102. registerCommand(ENSCRIPTSET_SIMPLEBONE,ENC_HIGHLIGHT,"units_genericbone_highlight")
  103.  
  104. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_MOVE,"units_genericbone_move")
  105. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_FIRE1,"units_genericbone_fire")
  106. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_FIRE2,"units_genericbone_fire")
  107. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_SELECT,"units_genericbone_select")
  108. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_SELECTENEMY,"units_genericbone_selectenemy")
  109. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_UNSELECT,"units_genericbone_unselect")
  110. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_SETUP,"units_genericbone_setup")
  111. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_RESETUP,"units_genericbone_resetup")
  112. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_DAMAGED,"units_genericbone_damaged")
  113. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_EXPLODE,"units_targetbone_explode")
  114. registerCommand(ENSCRIPTSET_TARGETBONE,ENC_HIGHLIGHT,"units_genericbone_highlight")
  115.  
  116. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_MOVE,"units_genericbone_move")
  117. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_FIRE1,"units_genericbone_fire")
  118. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_FIRE2,"units_genericbone_fire")
  119. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_SELECT,"units_genericbone_select")
  120. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_SELECTENEMY,"units_genericbone_selectenemy")
  121. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_UNSELECT,"units_genericbone_unselect")
  122. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_SETUP,"units_genericbone_setup")
  123. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_RESETUP,"units_genericbone_resetup")
  124. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_DAMAGED,"units_genericbone_damaged")
  125. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_EXPLODE,"units_basebone_explode")
  126. registerCommand(ENSCRIPTSET_BASE_BONE,ENC_HIGHLIGHT,"units_genericbone_highlight")
  127.